home *** CD-ROM | disk | FTP | other *** search
/ Gekkan Dennou Club 147 / Gekkan Dennou Club - 2000.8 Vol. 147 (Japan).7z / Gekkan Dennou Club - 2000.8 Vol. 147 (Japan) (Track 1).bin / html / docs / ippon / ver / 004 / main.txt
Encoding:
Text File  |  2000-07-07  |  5.9 KB  |  261 lines
  1. /* 男は一本槍 */
  2.  
  3. /* main.c */
  4. #include <stdio.h>
  5. #include <stdlib.h>
  6. #include <string.h>
  7. #include <ctype.h>
  8. #include <sys/dos.h>
  9. #include <sys/iocs.h>
  10. #include <XSP2lib.H>
  11.  
  12.  
  13. #define GLOBAL_DEFINE        /* グローバル変数を確保する */
  14. #include "main.h"
  15. #include "player.h"
  16.  
  17. static int old_crtmod;
  18.  
  19. #define PCG_MAX    256        /* パターンデータの個数 */
  20. #define FRM_MAX    256        /* フレームデータの個数 */
  21. #define REF_MAX    256        /* リファレンスデータの個数 */
  22.  
  23. static char pcg_alt[PCG_MAX + 1];    /* ＰＣＧ配置管理テーブル */
  24. static char pcg_dat[PCG_MAX * 128];    /* ＰＣＧデータファイル読み込みバッファ */
  25. static XOBJ_REF_DAT ref_dat[REF_MAX];    /* リファレンスデータ */
  26. static XOBJ_FRM_DAT frm_dat[FRM_MAX];    /* フレームデータ */
  27.  
  28. static int sizeof_pcg = 0;    /* スプライトＰＣＧパターン読み込み数 */
  29. static int sizeof_ref = 0;    /* 複合スプライトリファレンスデータ読み込み数 */
  30. static int sizeof_frm = 0;    /* 複合スプライトフレームデータ読み込み数 */
  31.  
  32. static unsigned short pal_dat[16][15];    /* パレットデータ */
  33.  
  34.  
  35.  
  36. void usage (void)
  37. {
  38.     printf (
  39.                "縦スクロールシューティング・一本槍 IPPON.X ver0.04\n"
  40.                "        programmed by Mitsuky <FreeSoftware>\n"
  41.                "LoadXSP() 関数を新設した\n"
  42.         );
  43. }
  44.  
  45.  
  46.  
  47. /* 終了時に１度だけ呼ばれる・エラーだったら返ってこない */
  48. void Tini (void)
  49. {
  50.     int sp;
  51.  
  52.     switch (error_level) {
  53.     case ERROR_NON:
  54.         xsp_off ();
  55.         /* 画面モードを元に戻す */
  56.         sp = _iocs_b_super (0);
  57.         *(unsigned short *) 0xe8e006 &= 0xfffd;        /* HRL ビットを元に戻す */
  58.         _iocs_b_super (sp);
  59.         _iocs_crtmod (old_crtmod);
  60.         _dos_kflushio (0xff);    /* キーバッファをクリア */
  61.         /* break が無い事に注意 */
  62.  
  63.     case ERROR_FILE:
  64.         _iocs_tgusemd (1, 0);
  65.         /* break が無い事に注意 */
  66.     case ERROR_GUSEMD:
  67.         _iocs_tgusemd (0, 0);
  68.         /* break が無い事に注意 */
  69.     case ERROR_TUSEMD:
  70.         /* break が無い事に注意 */
  71.     default:
  72.         break;
  73.     }
  74.  
  75.     if (error_level != ERROR_NON) {
  76.         /* エラーが発生した場合 */
  77.         puts (error_message);
  78.         exit (-1);    /* 終了する */
  79.     }
  80. }
  81.  
  82.  
  83.  
  84. /* 起動時のファイル読み込み */
  85. /* 読み込みに失敗した場合はいきなり終了するので注意 */
  86. /* 返り値 : 読み込んだ項目数 */
  87. static int LoadFile (char *fname, void *ptr, size_t size, size_t n)
  88. {
  89.     FILE *fp;
  90.     int i;
  91.  
  92.     fp = fopen (fname, "rb");
  93.     if (fp == NULL) {
  94.         static char e[256];
  95.         error_level = ERROR_FILE;
  96.         error_message = e;
  97.         sprintf (e, "ファイル %s が読み込めません\n", fname);
  98.         Tini ();    /* 返ってこない */
  99.     }
  100.     i = fread (ptr, size, n, fp);
  101.     fclose (fp);
  102.  
  103.     return (i);        /* 返り値は読み込み項目数 */
  104. }
  105.  
  106.  
  107.  
  108. /* XSP 各種データ読み込み・ファイル名は拡張子を付けずに指定すること */
  109. /* 返り値 : 複合スプライトNo. */
  110. static short LoadXSP (char *fname)
  111. {
  112.     int i;
  113.     int p, f, r;
  114.     short obj_no = sizeof_ref;
  115.     char temp_fname[92];
  116.  
  117.     strcpy (temp_fname, fname);
  118.     strcat (temp_fname, ".FRM");
  119.     f = LoadFile (temp_fname, &frm_dat[sizeof_frm], sizeof (XOBJ_FRM_DAT), FRM_MAX - sizeof_frm);
  120.  
  121.     strcpy (temp_fname, fname);
  122.     strcat (temp_fname, ".REF");
  123.     r = LoadFile (temp_fname, &ref_dat[sizeof_ref], sizeof (XOBJ_REF_DAT), REF_MAX - sizeof_ref);
  124.  
  125.     strcpy (temp_fname, fname);
  126.     strcat (temp_fname, ".XSP");
  127.     p = LoadFile (temp_fname, &pcg_dat[sizeof_pcg], sizeof (char), 128 * PCG_MAX - sizeof_pcg);
  128.  
  129.     /* FRM_DAT[].pt 補正 */
  130.     for (i = 0; i < f; i++)
  131.         frm_dat[sizeof_frm + i].pt += sizeof_pcg / 128;
  132.  
  133.     /* REF_DAT[].ptr 補正 */
  134.     for (i = 0; i < r; i++)
  135.         (int) ref_dat[sizeof_ref + i].ptr += (int) (&frm_dat[sizeof_frm]);
  136.     sizeof_pcg += p;
  137.     sizeof_frm += f;
  138.     sizeof_ref += r;
  139.  
  140. #ifdef DEBUG
  141.     printf ("%s を読み込みました sizeof_ref = %hd\n", fname, obj_no);
  142. #endif
  143.  
  144.     return (obj_no);
  145. }
  146.  
  147.  
  148.  
  149. /* 起動時に１度だけ呼ばれる */
  150. static void Init (void)
  151. {
  152.     int sp;
  153.     int i, j;
  154.     static unsigned short crtcdata[9] =
  155.     {69, 6, 11 + 8, 59 - 8, 567, 5, 40, 552, 0x0111};
  156.     unsigned short *d;
  157.  
  158.     error_message = NULL;
  159.  
  160.     /* テキスト画面の使用状況をチェック */
  161.     error_level = ERROR_TUSEMD;
  162.     if (_iocs_tgusemd (1, -1) == 2) {
  163.         error_message = "テキスト VRAM が使用中です";
  164.         Tini ();
  165.     }
  166.     /* グラフィック画面の使用状況をチェック */
  167.     error_level = ERROR_GUSEMD;
  168.     if (_iocs_tgusemd (0, -1)) {
  169.         error_message = "グラフィック VRAM が使用中です";
  170.         Tini ();
  171.     }
  172.     _iocs_tgusemd (0, 2);
  173.     _iocs_tgusemd (1, 2);
  174.  
  175.  
  176.     /* 各種ファイル読み込み */
  177.     error_level = ERROR_FILE;
  178.     obj_player = LoadXSP ("PLAYER");
  179.     LoadFile ("PLAYER.PAL", &pal_dat, sizeof (unsigned short), 16*15);
  180.  
  181.     error_level = ERROR_NON;    /* エラーなし */
  182.  
  183.     /* XSP 関連の初期化 */
  184.     xsp_on ();
  185.     xsp_mode (3);
  186.     /* パターンデータを定義 */
  187.     xsp_pcgdat_set (pcg_dat, pcg_alt, sizeof (pcg_alt));
  188.     xsp_objdat_set (ref_dat);
  189.  
  190.  
  191.     /* 画面モードの初期化 */
  192.     /* 256x256ドット 31kHz 256色モードに */
  193.     old_crtmod = _iocs_crtmod (-1);        /* 前の CRTMOD を保存 */
  194.     _iocs_crtmod (10);    /* 256x256dot 31kHz 256色 */
  195.     _iocs_g_clr_on ();    /* 一応 */
  196.     _iocs_sp_init ();    /* スプライトの初期化 */
  197.     _iocs_sp_on ();
  198.  
  199.     /* 256x256 正方形モードを作る */
  200.     sp = _iocs_b_super (0);
  201.     *(unsigned short *) 0xe80028 = crtcdata[8];
  202.     d = (unsigned short *) 0xe80002;
  203.     for (i = 1; i < 8; i++)
  204.         *d++ = crtcdata[i];
  205.     *(unsigned short *) 0xe80000 = crtcdata[0];
  206.  
  207.     *(unsigned short *) 0xe8e006 |= 0b10;    /* HRL ビット */
  208.     *(unsigned short *) 0xeb080c = crtcdata[2] + 4;
  209.     *(unsigned short *) 0xeb080a = crtcdata[0];    /* スプライト */
  210.     *(unsigned short *) 0xeb080e = crtcdata[6];
  211.     *(unsigned int *) 0xe80018 = *(unsigned int *) 0xe8001c
  212.         = *(unsigned int *) 0xe80020 = *(unsigned int *) 0xe80024
  213.         = (0 << 16) + 0;    /* グラフィック画面の座標 */
  214.  
  215.     *(unsigned short *) 0xe82500 = 0b01001001001110;    /* 優先順位 TX>SP>GR */
  216.     _iocs_b_super (sp);
  217.  
  218.     /* パレットデータを定義 */
  219.     /* （１パレットブロック＝16色） × （15ブロックぶん） 定義する */
  220.     {
  221.         unsigned short *p = (unsigned short *) pal_dat;
  222.         for (i = 1; i < 15; i++)
  223.             for (j = 0; j < 16; j++)
  224.                 _iocs_spalet (0x80000000 | j, i, *p++);
  225.     }
  226. }
  227.  
  228.  
  229.  
  230. /* ゲーム本体 */
  231. static void Game (void)
  232. {
  233.     printf ("ジョイスティックの [A] ボタンを押すと終了します\n");
  234.  
  235.     PlayerInit ();
  236.  
  237.     PlayerAlloc ();
  238.  
  239.     do {
  240.         PlayerMove ();
  241.         xsp_out ();    /* 表示 */
  242.     } while (!game_over);
  243.  
  244.     PlayerFree ();
  245. }
  246.  
  247.  
  248.  
  249. int main (int argc, char *argv[])
  250. {
  251.     if (argc != 1) {
  252.         usage ();
  253.         return (-1);
  254.     }
  255.     Init ();
  256.     Game ();
  257.     Tini ();
  258.  
  259.     return (0);
  260. }
  261.